home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Languages / Masm V6.11 / SAMPLES / MIXED / BASMAIN.BA$ / BASMAIN
Encoding:
Text File  |  1992-11-12  |  220 b   |  12 lines

  1. ' Calls Power2 routine in BASIC.ASM
  2. ' Compile with BC BASMAIN.BAS BASIC.OBJ
  3.  
  4. DEFINT A-Z
  5.  
  6. DECLARE FUNCTION Power2 (A AS INTEGER, B AS INTEGER)
  7. PRINT "3 times 2 to the power of 5 is ";
  8. PRINT Power2(3, 5)
  9.  
  10.  
  11. END
  12.